<?php
session_start();
$ruta_raiz = "..";
if (!$dependencia and !$depe_codi_territorial)include "../rec_session.php";

$htmlE ="";

error_reporting(7);
?>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="../estilos/orfeo.css">
</head>
<body>
<?php
  if($gen_lisDefi and !$cancelarListado)
{
    $indi_generar = "SI";
}
else
{
    $indi_generar = "NO";
}

 
?>
<table class=borde_tab width='100%' cellspacing="5"><tr><td class=titulos2><center>LISTADO DOCUMENTOS ENVIADOS</center></td></tr></table>
<table><tr><td></td></tr></table>
<form name='forma' action='generaplanilla.php?<?=session_name()."=".session_id()."&krd=$krd&hora_ini=$hora_ini&hora_fin=$hora_fin&minutos_ini=$minutos_ini&minutos_fin=$minutos_fin&tip_radi=$tip_radi&fecha_busq=$fecha_busq&fecha_busqH=$fecha_busqH&fecha_h=$fechah&dep_sel=$dep_sel&num=$num"?>' method=post>
    <?php
	error_reporting(7);

    include_once "$ruta_raiz/include/db/ConnectionHandler.php";
    $db = new ConnectionHandler("$ruta_raiz");
//$db->conn->debug=true;
    define('ADODB_FETCH_ASSOC',2);
    $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

   if (!$no_planilla or intval($no_planilla) == 0) die ("<table class=borde_tab width='100%'><tr><td class=titulosError><center>Debe colocar un Numero de Planilla v&aacute;lido</center></td></tr></table>");

   	error_reporting(7);
	$ruta_raiz = "..";
	
   	if (!defined('ADODB_FETCH_NUM'))	define('ADODB_FETCH_NUM',1);
	$ADODB_FETCH_MODE = ADODB_FETCH_NUM; 

	$fecha_ini = $fecha_busq;// le resto un día
   	$fecha_fin = $fecha_busq;
	$fecha_ini = mktime($hora_ini,$minutos_ini,00,substr($fecha_ini,5,2),substr($fecha_ini,8,2),substr($fecha_ini,0,4));
	$fecha_fin = mktime($hora_fin,$minutos_fin,59,substr($fecha_fin,5,2),substr($fecha_fin,8,2),substr($fecha_fin,0,4));
	$fecha_ini=$fecha_ini-86400;
	$fecha_ini1 = "$fecha_busq $hora_ini:$minutos_ini:00";
	$fecha_mes = "'" . substr($fecha_ini1,0,7) . "'";
	$sqlChar = $db->conn->SQLDate("Y-m","SGD_RENV_FECH");	

// Si la variable $generar_listado_existente viene entonces este if genera la planilla existente
	$order_isql = " ORDER BY SGD_RENV_CODIGO,SGD_RENV_VALOR";
	if($codigo_envio>200){
		$codigo_envio=201;	
	}
	include "$ruta_raiz/include/query/radsalida/queryListado_planillas.php";	
//$db->conn->debug=true;		
// MOFIFICADO EJERCITO 2009-03-02 PATCH		
	$fecha_mes = substr($fecha_busq,2,5) ;	
	if($codigo_envio>200){
		// Condiciono que los documentos pertenezcan a la brigada respectiva						
		$query="select SGD_RENV_CANTIDAD as CANTIDAD, SGD_RENV_FECH as FECHA, RADI_NUME_SAL as RADICADO,
(SELECT RADI_CUENTAI FROM radicado WHERE radi_nume_radi=RADI_NUME_SAL) as RAD_ENT,
SGD_RENV_MPIO as MUNICIPIO, SGD_RENV_DEPTO as DEPARTAMENTO,
SGD_RENV_NOMBRE as DESTINATARIO,  
SGD_RENV_DIR as UNIDAD_DESTINO, (SELECT D.SGD_DIR_NOMREMDES FROM sgd_dir_drecciones D
WHERE D.radi_nume_radi=RADI_NUME_SAL AND D.sgd_dir_tipo=1) AS REMITENTE, SGD_RENV_OBSERVA as OBSERVA
from SGD_RENV_REGENVIO ";		
		$where_isql1 = " WHERE DEPE_CODI= " . $dependencia .
			" AND TO_CHAR(SGD_RENV_FECH,'YY-MM') = '$fecha_mes'	AND sgd_renv_fech <=" .$db->conn->DBTimeStamp($fecha_fin).
			" AND SGD_FENV_CODIGO = $codigo_envio
			 AND ( SGD_RENV_PLANILLA IS  NULL OR SGD_RENV_PLANILLA = '' OR SGD_RENV_PLANILLA = 0 OR SGD_RENV_PLANILLA=$no_planilla)
			AND sgd_renv_tipo <2 AND SGD_RENV_DESTINO='$BRIGADA'";
		$where_isql2 = "	WHERE DEPE_CODI= " .$dependencia .
			"	AND SGD_FENV_CODIGO = $codigo_envio
				AND TO_CHAR(SGD_RENV_FECH,'YY-MM') = '$fecha_mes'
			AND SGD_RENV_PLANILLA= " . "'" . $no_planilla . "'" .
			" AND sgd_renv_tipo < 2 AND SGD_RENV_DESTINO='$BRIGADA'";		
	}	

	if($generar_listado_existente){
		$where_isql = $where_isql2;
	}else{  
		$where_isql = $where_isql1;
	}
	
	
	$isql = $query . $where_isql . $order_isql;
	$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
	$rsMarcar = $db->conn->query($isql);	
	
	//echo "SQL PARA GENERAR PLANTILLA: <BR> $isql <BR>";
/*	echo "entra - $isql"; */
//	$db->conn->debug=true; 
	$no_registros = 0;
    	//$no_registros = $rsMarcar->recordcount(); 
     	$radiNumero = $rsMarcar->fields["RADICADO"];
	//if ($no_registros <=0) {
	if ($radiNumero=='') {
          	$estado = "Error";
 	   	$mensaje = "Verifique la fecha"; 
	   	echo "<script>alert('No se puede Generar el Listado. $mensaje  ')</script>";
	}
	else 
	{
		$archivo = "../bodega/pdfs/planillas/envios/$krd". date("Ymd_hms") . "_lis_IMP.csv";
		$fp=fopen($archivo,"w");
		$com = chr(34); 
  	        $contenido="$com*No*$com,$com*Fecha*$com,$com*Radicado*$com,$com*Destino*$com,,$com*Departamento*$com,$com*Destinatario*$com,$com*Empresa*$com,$com*Direccion*$com,$com*Telefono*$com,$com*Observacion*$com,$com*Dependencia*$com\n";
			if($codigo_envio>200){
				$contenido="$com*No*$com,$com*Fecha*$com,$com*Radicado*$com,$com*Radicado Ent*$com,$com*Destino*$com,$com*Departamento*$com, $com*Unidad*$com, $com*Remitente*$com, $com*Observacion*$com,$com*Dependencia*$com\n";
			}           	
			$query_t = $isql ;
		//echo "entra";	
			$ruta_raiz = "..";
			error_reporting(7);
			define('ADODB_FETCH_NUM',1);
			$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
			require "../radsalida/classControlLis.php";
			$btt = new CONTROL_ORFEO($db);
			$campos_align = array("C","C","L","L","L","L","L","L","L","L","L");
			$campos_tabla = array("$cantidad","$fecha","$verradicado","$mpio","$depto","$destinatario","$direccion","$telefono","$observa","$dep_radicado");
			$campos_vista = array ("No","Fecha","Radicado","Destino","Departamento","Peso","Valor","Destinatario","Empresa","Direccion","Telefono","Observacion","Dependencia");
			$campos_width = array (40, 80, 100, 140, 100,40,40, 180, 150, 220, 80,110,80);
			// MODIFICADO EJERCITO 2009-03-04
					
			if($codigo_envio>200){
				$campos_align = array("C","C","L","L","L","L","L","L","L","L","L");
				$campos_tabla = array("$cantidad","$fecha","$verradicado","$rad_ent","$mpio","$depto", "$unidad", "$remitente","$observa","$dep_radicado");
				$campos_vista = array ("No","Fecha","Radicado", "Rad.Entr", "Destino","Departamento","Unidad","Remitente","Observacion","Dependencia");
				$campos_width = array (40, 80, 100, 100, 100, 100,280, 280, 80,110);
			}
			$btt->campos_align = $campos_align;
			$btt->campos_tabla = $campos_tabla;
			$btt->campos_vista = $campos_vista;
			$btt->campos_width = $campos_width;
			$btt->tabla_sql($query_t,$fecha_busq,$fecha_busq);
			$htmlE = $btt->tabla_htmlE;

	  
	   while (!$rsMarcar->EOF) {
			
		$no_registros = $no_registros + 1;
       		$mensaje = "";
		$cantidad    	 	= $rsMarcar->fields["CANTIDAD"];  
		$fecha			= $rsMarcar->fields["FECHA"]; 
      	$verradicado  		= $rsMarcar->fields["RADICADO"];
		// MOFIFICADO EJERCITO 2009-03-02 PATCH		
		if($codigo_envio>200){		
			//$verradicado.=" - E: ".$rsMarcar->fields["RAD_ENT"];
			$rad_ent=$rsMarcar->fields["RAD_ENT"];;		
		}
		$destinatario        	= $rsMarcar->fields["DESTINATARIO"];
		$empresa		= $rsMarcar->fields["EMPRESA"];
		$moto   		= $rsMarcar->fields["TIPO"];
		$depto   		= $rsMarcar->fields["DEPARTAMENTO"];
		$peso   		= $rsMarcar->fields["PESO"];
		$valor   		= $rsMarcar->fields["VALOR"];
		$mpio			= $rsMarcar->fields["MUNICIPIO"];
		$direccion   		= $rsMarcar->fields["DIRECCION"];
		$telefono   		= $rsMarcar->fields["TELEFONO"];
		$observa 		= $rsMarcar->fields["OBSERVA"];
		$dep_radicado   	= substr($verradicado,4,3);
		$ano_radicado   	= substr($verradicado,0,4);
		$remitente=$rsMarcar->fields["REMITENTE"];
		$unidad=$rsMarcar->fields["UNIDAD_DESTINO"];
		
        
		if($codigo_envio>200){		// para rad por unidades
			$campos_tabla = array("$cantidad","$fecha","$verradicado","$rad_ent","$mpio","$depto", "$unidad", "$remitente","$observa","$dep_radicado");
		}else{
			$campos_tabla = array("$cantidad","$fecha","$verradicado","$mpio","$depto","$peso","$valor","$destinatario","$empresa","$direccion","$telefono","$observa","$dep_radicado");
		}		
		$btt->campos_tabla = $campos_tabla;
		$btt->tabla_Cuerpo();
		error_reporting(7);
		if($codigo_envio>200){		// para rad por unidades
  	    	$contenido.="$com$cantidad$com,$com$fecha$com,$com$verradicado$com,$com$rad_ent$com,$com$mpio$com,$com$depto$com,$com$unidad$com,$com$remitente$com,$com$observa$com,$com$dep_radicado$com\n";
		}else{ 
			$contenido= $contenido ."0,$com$cantidad$com,$com$fecha$com,$com$verradicado$com,$com$mpio$com,$com$depto$com,$com$valor$com,$com$destinatario$com,$com$empresa$com,$com$direccion$com,$com$telefono$com,$com$observa$com,$com$dep_radicado$com\n";
		}		
	if(!$generar_listado_existente)
	{
		$update_isql = "update sgd_renv_regenvio set sgd_renv_planilla='$no_planilla' where radi_nume_sal='$verradicado'";
		$rs = $db->query($update_isql);	
//$db->conn->debug=true;
		  }		

 	        $rsMarcar->MoveNext();
					
	   } // FIN del WHILE (!$rsMarcar->EOF)
	   	
		fputs($fp,$contenido);
		fclose($fp);
		$fecha_dia = date("Ymd - H:i:s");
		$html  = $htmlE;		
		$html  .= $btt->tabla_html;
		//$html  = $btt->tabla_html;
		error_reporting(7);
		define(FPDF_FONTPATH,'../fpdf/font/');
		require("../fpdf/html_table.php");
		error_reporting(7);
		$pdf = new PDF("L","mm","legal");
		$pdf->AddPage();
		$pdf->SetFont('Arial','',8);
		$entidad = $db->entidad;
		$encaenti = "../png/encabezado_".$entidad . ".jpg";

		switch($codigo_envio){
		case '101': $tipo="CERTIFICADO"; break;
		case '102': $tipo="NORMAL"; break;
		case '103': $tipo="MSJ ESPECIALIZADA"; break;
		case '109': $tipo="CERTIFICADO CON ACUSE"; break;
		case '104': $tipo="INTERNACIONAL"; break;	
		case '105': $tipo="CORREO_ELECTRONICO"; break;	
		case '120': $tipo="INTERNO"; break;		
		}

		$encabezado = "<table border=0>
            		<tr><td width=1120 height=70><img src=$encaenti width=950 height=65></td></tr>
			<tr><td width=1120 height=40> </td></tr>
			<tr><td width=1120 height=40> </td></tr>
			<tr><td width=1120 height=40> </td></tr>
			<tr><td width=1120 height=80> </td></tr> 
			<tr><td width=1120 height=20>PLANILLA No	 : $no_planilla</td></tr>
			<tr><td width=1120 height=20>Tipo de envio       : $tipo </td></tr>
			<tr><td width=1120 height=20>Origen       : $origen </td></tr>
			<tr><td width=1120 height=20>Dependencia         : $depe_nomb </td></tr>
			<tr><td width=1120 height=20>Usuario responsable : $usua_nomb </td></tr>
			<tr><td width=1120 height=20>Fecha Generado      : $fecha_dia </td></tr>
			<tr><td width=1120 height=20>Numero de Registros : $no_registros </td></tr>
			<tr><td width=1120 height=40></td></tr>
			</table>";
		$fin = "<table border=0 >
		    <tr><td width=1120 height=40></td></tr>
			<tr><td width=560 height=40 > Firma responsable  ________________________________________________</td>
			<td width=560 height=30 > Recibio  ______________________________________________</td></tr>
			<tr><td width=1120 height=40 >Observaciones	  ____________________________________________________________________________________________________________________________________________________________________</td></tr>
			<tr><td width=1120 height=40 >__________________________________________________________________________________________________________________________________________________________________________________</td></tr>
			<tr><td width=1120 height=40></td></tr>
		</table>
		<br>";
		
		$pdf->WriteHTML($encabezado. $html. $fin);
		$arpdf_tmp = "../bodega/pdfs/planillas/envios/$krd". date("Ymd_hms") . "_lis_IMP.pdf";
		$pdf->Output($arpdf_tmp);
		echo "Para imprimir la planilla siga el siguiente v&iacute;nculo  <a class=vinculos href='$arpdf_tmp' target='".date("dmYh").time("his")."'>Abrir Archivo Pdf</a>";
		echo "<br>";
		$salida = "csv";
		echo "Para obtener el archivo csv guarde del destino del siguiente v&iacute;nculo  <a class=vinculos href='$archivo' target='".date("dmYh").time("his")."'>Generado
              </a>";
	}  

//Despues de crear la planilla se actualiza la tabla para escribir el numero de planilla
				
	//FIN else if ($no_registros <=0)
?>
 </form>
 <?

?>  
</body>
</html>
 
